﻿Public Class list
    Inherits System.Web.UI.Page

    Protected Sub page_load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load, Me.Load, Me.Load
        If Request.Params("TagName") = "" Then
            GridView1.DataSourceID = "IslandDataSource"
        Else
            GridView1.DataSourceID = "IslandDataSource0"
        End If
    End Sub

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
      
    End Sub

    Protected Sub btn_search_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btn_search.Click
        Dim url As String = "IslandTagging.aspx?TagName=" & tb_ts.Text
        Response.Redirect(url)
    End Sub

    Protected Sub ImageButton1_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton1.Click
        Response.Redirect("rss.aspx")
    End Sub
End Class